perl scalar values